e
#Title[ʏ5]
#Text[펯jx̎
ʏ2]
#BackGround[User]
#BGM[.\..\bgm\bgm.wav]
#Player[FREE]
#ScriptVersion[2]

script_enemy_main {
	
	////////////////////////////////////////////////////////////////////////
	//                                                          //
	//   e摜̕ύX                                                     //
	//   z[~OAttributeAdd̂̂ɕύX                         //
	//   z[~O̐xAxAxύX                         //
	////////////////////////////////////////////////////////////////////////
	
	@Initialize{
		InitializeData();
		
		LoadUserShotData(shot_ryoyan);
		
		SetLife(4000);
		SetDamageRate(120,100);
		SetMovePosition03(GetCenterX(),150,10,8);
		SetInvincibility(120);
		SetCollisionEx(32,16);
		SetEnemyMarker(true);
		
		TMain();
	}
	
	@MainLoop{
		yield;
	}
	
	@DrawLoop{
		DrawBoss(imgBoss);
	}
	
	@Finalize{
		FinalizeData();
	}
	
	task TMain(){
		wait(120);
		
		SetTimer(60);
		
		Atack();
		Move();
	}
	
	task Atack(){
		wait(21);
		
		loop{
			ascent(i in 0..6){
				homingShot02(GetX(),GetY(),2.6,i * 60,-0.05,0.0023,2.2,_WHITE01(),0);
			}
			
			wait(90);
		}
	}
	
	// z[~Oe
	// x=oʒu(wW)@y=oʒu(xW)@spd=ړx@ksk=@ksk2=lɉZ@angle=ˊpx@seido=x@gp=OtBbN@dly=˂܂ł̃A
	task homingShot02(let x,let y,let spd,let angle,let ksk,let ksk2,let seido,let gp,let dly) {
		let id = Obj_Create(OBJ_SHOT);
		Obj_SetPosition(id,x,y);
		Obj_SetSpeed(id,spd);
		Obj_SetAngle(id,angle);
		ObjShot_SetGraphic(id,gp);
		ObjShot_SetDelay(id,dly);
		ObjShot_SetBombResist(id,false);
		ObjShot_ToItem(id,true);
		Obj_SetAlpha(id,0);
		
		wait(dly);
		
		AA_Homing(id,seido,60 * 60);
		
		while( !Obj_BeDeleted(id) ){
			yield;
			
			Obj_SetSpeed(id,Obj_GetSpeed(id) + ksk);
			ksk += ksk2;
			let id2 = CreateShotObj(Obj_GetX(id),Obj_GetY(id),0,0,_WHITE01(),15);
			AA_TimeDelete(id2,14,false);
		}
	}
	
	task Move(){
		loop{
			ascent(cnt in 0..20){
				SetGraphicScale(1-(cnt+1)*0.05,1+(cnt+1)*0.05);
				yield;
			}
			
			SetGraphicScale(1.0,1.0);
			
			SetX( GetPlayerX() );
			SetY( GetClipMinY() + rand(50,200) );
			
			descent(cnt in 0..20) {
				SetGraphicScale(1-(cnt+1)*0.05,1+(cnt+1)*0.05);
				yield;
			}
			
			wait(50);
		}
	}
	
	#include_function ".\..\functions\initialize.txt"
	#include_function ".\..\functions\color_set.txt"
	#include_function ".\..\functions\function.txt"
}
